home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
FishMarket 1.0
/
FishMarket v1.0.iso
/
fishies
/
001-025
/
disk_013
/
qbox.bas
< prev
next >
Wrap
BASIC Source File
|
1992-05-06
|
113b
|
6 lines
5 pattern
10 ask window x%, y%
15 pena rnd * 15
20 box(x%*rnd,y%*rnd;x%*rnd,y%*rnd),1
30 goto 10